home *** CD-ROM | disk | FTP | other *** search
/ MacAddict 117 / MacAddict 117.dmg / Software / Internet & Communication / Snak 5.1 (shareware).dmg / Snak.app / Contents / Resources / Scripts / action.txt < prev    next >
Text File  |  2006-02-01  |  3KB  |  112 lines
  1. # This file is based on a file included with the standard distribution of ircII
  2. # It contains aliases that mostly create atmosphere - little expressions that
  3. # you can use express opinions while saving typing.
  4.  
  5. # basical and action are automatically loaded into each connection 
  6. # when the connection is opened
  7.  
  8. # If the variable 'GENDER' is set, 'POSSESSIVE' is set accordingly
  9. # and used by some actions, but it works also without.
  10.  
  11. # Valid values are M and F
  12.  
  13. assign GENDER M
  14.  
  15. if (GENDER) {
  16.     if ([$GENDER] == [F]) {
  17.         assign POSSESSIVE her
  18.     } {
  19.         assign POSSESSIVE his
  20.     }
  21. } {
  22.     assign POSSESSIVE the
  23. }
  24.  
  25. # The $me variable is a synonum for $N that holds your nick
  26. assign me $N
  27.  
  28. # These commands can be used with or without an adverb of your choice.
  29. #
  30. alias applaud me applauds
  31. alias bounce me bounces around
  32. alias chuckle me chuckles
  33. alias clap me claps $POSSESSIVE hands
  34. alias giggle me giggles
  35. alias grin me grins
  36. alias groan me groans
  37. alias moan me moans
  38. alias nod me nods
  39. alias purr me purrs
  40. alias scratch me scratches $POSSESSIVE head
  41. alias shrug me shrugs
  42. alias sigh me sighs
  43. alias smile me smiles
  44. alias wave me waves goodbye
  45. alias wink me winks
  46. alias yawn me yawns
  47. alias think say . o O \( $* \)
  48.  
  49. # Same type, but a bit more complex (with 'defaults').
  50. #
  51. alias laugh {
  52.     if ([$*]) { me laughs $*
  53.     } { me falls down laughing.
  54.     }
  55. }
  56. alias sing {
  57.     if ([$*]) { me sings $*
  58.     } { me sings "O sole mio, sta'n fronte a te..."
  59.     }
  60. }
  61.  
  62. alias dance {
  63.     if ([$*]) { me sweeps $0 across the dance floor $1-
  64.     } { me does the dance of the disco-duck.
  65.     }
  66. }
  67. alias shake {
  68.     if ([$*]) { me shakes hands with $*
  69.     } { me shakes $POSSESSIVE head.
  70.     }
  71. }
  72.  
  73. alias e {
  74.  me eats $0
  75.  say *BURP*
  76. }
  77.  
  78.  
  79. # These can only be used without arguments.
  80. #
  81. alias bow me bows gracefully.
  82. alias burp me burps rudely.
  83. alias cough me coughs noisily.
  84. alias cry me bursts into tears. Waaaaah!
  85. alias gasp me gasps in astonishment!
  86. alias scream me screams loudly: Aaarrrgghh!!!
  87. alias shiver me shivers from the cold. Brrrr!
  88. alias snap me snaps with $POSSESSIVE fingers.
  89. alias sneeze me sneezes. Gesundheit!
  90. alias snore me snores loudly. Zzzz...
  91. alias whistle me whistles a well known melody. 
  92. alias wiggle me wiggles $POSSESSIVE bottom.
  93.  
  94. # These require a nickname as argument.
  95. # (Or 'you' if you are in a /query).
  96. #
  97. alias comfort me comforts
  98. alias cuddle me cuddles
  99. alias hug me hugs
  100. alias kiss me kisses
  101. alias love me whispers sweet words of love to
  102. alias pat me pats $0 on the shoulders $1-
  103. alias poke me pokes $0 in the ribs $1-
  104. alias slap me slaps $0 in the face $1-
  105. alias spit me spits on
  106. alias thank me thanks $* from the heart.
  107. alias kb kick $C $0 It's time to kick $0 and chew bubblegum. And I'm all out of bubblegum.
  108. alias trout me slaps $0 around with a fresh trout
  109. alias p me nods at $0 and gives him a small kipper
  110.  
  111.  
  112.